object newmail: Tnewmail Left = 484 Top = 597 BorderIcons = [] BorderStyle = bsNone Caption = 'Milo' ClientHeight = 64 ClientWidth = 256 Color = clWhite Font.Charset = EASTEUROPE_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] FormStyle = fsStayOnTop OldCreateOrder = False Position = poDefault OnClose = FormClose OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object skin: TImage Left = 0 Top = 0 Width = 256 Height = 64 AutoSize = True OnMouseMove = skinMouseMove end object button1: TLabel Left = 8 Top = 8 Width = 241 Height = 16 Cursor = crHandPoint AutoSize = False Color = clBlack Font.Charset = EASTEUROPE_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentColor = False ParentFont = False Transparent = True OnClick = button1Click end object button2: TLabel Left = 8 Top = 32 Width = 241 Height = 16 Cursor = crHandPoint AutoSize = False Color = clBlack Font.Charset = EASTEUROPE_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentColor = False ParentFont = False Transparent = True OnClick = button2Click end object autoclose_timer: TTimer Interval = 5000 OnTimer = autoclose_timerTimer Left = 8 Top = 8 end end